Toot-Avatar-Scale-Y names an undocumented function, with lambda list (OBJECT).
(SETF Toot-Avatar-Scale-Y) names an undocumented function, with lambda list (NEW-VALUE OBJECT).